home *** CD-ROM | disk | FTP | other *** search
Unknown | 1990-08-07 | 5.5 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 21 f4 20 3e 20 | 24 2e 55 74 69 6c 73 2e |...!. > |$.Utils.|
|00000010| 21 4d 49 53 70 65 6c 6c | 2e 21 57 69 6d 70 4d 61 |!MISpell|.!WimpMa|
|00000020| 6e 0d 00 14 1b 45 78 65 | 63 43 6f 6d 6d 24 3d 22 |n....Exe|cComm$="|
|00000030| 43 68 65 63 6b 20 6c 61 | 73 74 20 22 0d 00 1e 1b |Check la|st "....|
|00000040| 4f 70 74 43 6f 6d 6d 24 | 3d 20 22 53 65 74 20 6f |OptComm$|= "Set o|
|00000050| 70 74 69 6f 6e 73 22 0d | 00 28 7d 43 6f 6d 6d 61 |ptions".|.(}Comma|
|00000060| 6e 64 24 3d 22 3c 4d 49 | 53 70 65 6c 6c 24 44 69 |nd$="<MI|Spell$Di|
|00000070| 72 3e 2e 21 72 75 6e 69 | 6d 61 67 65 20 22 3a 20 |r>.!runi|mage ": |
|00000080| 54 61 73 6b 24 3d 22 4d | 49 53 70 65 6c 6c 22 3a |Task$="M|ISpell":|
|00000090| 20 4d 65 6e 75 24 3d 22 | 4d 49 53 70 65 6c 6c 20 | Menu$="|MISpell |
|000000a0| 63 6f 6d 6d 61 6e 64 20 | 6c 69 6e 65 22 3a 20 49 |command |line": I|
|000000b0| 63 6f 6e 24 3d 22 53 21 | 6d 69 73 70 65 6c 6c 22 |con$="S!|mispell"|
|000000c0| 3a 49 63 6f 6e 4e 61 6d | 65 24 3d 22 4d 49 53 70 |:IconNam|e$="MISp|
|000000d0| 65 6c 6c 22 0d 00 32 0c | 4c 61 73 74 24 3d 22 22 |ell"..2.|Last$=""|
|000000e0| 0d 00 3c 14 f4 20 46 6f | 72 20 41 33 31 30 2c 20 |..<.. Fo|r A310, |
|000000f0| 74 72 79 3a 0d 00 46 8b | f4 20 43 6f 6d 6d 61 6e |try:..F.|. Comman|
|00000100| 64 24 3d 22 63 6f 6d 6d | 6f 6e 74 65 78 20 5c 70 |d$="comm|ontex \p|
|00000110| 61 67 65 6e 6f 3d 31 5c | 72 65 6c 61 78 5c 69 6e |ageno=1\|relax\in|
|00000120| 70 75 74 20 22 3a 52 45 | 4d 20 54 61 73 6b 24 3d |put ":RE|M Task$=|
|00000130| 22 54 65 58 20 6d 61 6e | 22 3a 52 45 4d 20 4d 65 |"TeX man|":REM Me|
|00000140| 6e 75 24 3d 22 54 65 58 | 20 63 6f 6d 6d 61 6e 64 |nu$="TeX| command|
|00000150| 20 6c 69 6e 65 22 3a 52 | 45 4d 20 49 63 6f 6e 24 | line":R|EM Icon$|
|00000160| 3d 22 53 21 74 65 78 22 | 3a 52 45 4d 20 49 63 6f |="S!tex"|:REM Ico|
|00000170| 6e 4e 61 6d 65 24 3d 22 | 54 65 58 33 31 30 22 0d |nName$="|TeX310".|
|00000180| 00 50 1c c8 99 20 22 4f | 53 5f 47 65 74 45 6e 76 |.P... "O|S_GetEnv|
|00000190| 22 20 b8 20 70 61 72 61 | 6d 73 24 0d 00 5a 67 de |" . para|ms$..Zg.|
|000001a0| 20 62 75 66 66 65 72 73 | 25 20 32 35 35 2c 76 61 | buffers|% 255,va|
|000001b0| 6c 69 64 62 75 66 66 65 | 72 25 20 33 32 2c 71 25 |lidbuffe|r% 32,q%|
|000001c0| 20 32 35 35 2c 74 61 73 | 6b 69 64 25 20 34 2c 6d | 255,tas|kid% 4,m|
|000001d0| 65 6e 75 25 20 32 35 35 | 2c 69 63 6f 6e 73 25 28 |enu% 255|,icons%(|
|000001e0| 39 29 2c 74 65 78 74 62 | 75 66 66 65 72 25 20 36 |9),textb|uffer% 6|
|000001f0| 34 30 2c 63 6f 6d 6d 62 | 75 66 66 65 72 25 20 36 |40,commb|uffer% 6|
|00000200| 34 30 0d 00 64 0d e0 3d | e0 2b 26 31 30 30 30 0d |40..d..=|.+&1000.|
|00000210| 00 6e 0f 69 63 6f 6e 73 | 25 28 29 3d 2d 31 0d 00 |.n.icons|%()=-1..|
|00000220| 78 0d 6e 69 63 6f 6e 73 | 25 3d 30 0d 00 82 17 24 |x.nicons|%=0....$|
|00000230| 76 61 6c 69 64 62 75 66 | 66 65 72 25 3d 49 63 6f |validbuf|fer%=Ico|
|00000240| 6e 24 0d 00 8c 04 0d 00 | 96 13 24 74 61 73 6b 69 |n$......|..$taski|
|00000250| 64 25 3d 22 54 41 53 4b | 22 0d 00 a0 5a c8 99 20 |d%="TASK|"...Z.. |
|00000260| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|00000270| 22 2c 32 30 30 2c 21 74 | 61 73 6b 69 64 25 2c 54 |",200,!t|askid%,T|
|00000280| 61 73 6b 24 20 b8 20 2c | 6f 75 72 68 61 6e 64 6c |ask$ . ,|ourhandl|
|00000290| 65 25 3a f4 20 54 69 74 | 6c 65 20 66 6f 72 20 74 |e%:. Tit|le for t|
|000002a0| 61 73 6b 20 6d 61 6e 61 | 67 65 72 20 64 69 73 70 |ask mana|ger disp|
|000002b0| 6c 61 79 0d 00 aa 11 ee | 20 85 20 f2 65 72 72 6f |lay.....| . .erro|
|000002c0| 72 62 6f 78 0d 00 b4 1a | 70 25 3d a7 70 61 72 61 |rbox....|p%=.para|
|000002d0| 6d 73 24 2c 22 20 2d 71 | 75 69 74 20 22 29 0d 00 |ms$," -q|uit ")..|
|000002e0| be 0a e7 20 70 25 20 8c | 0d 00 c8 23 70 61 72 61 |... p% .|...#para|
|000002f0| 6d 73 24 3d c1 70 61 72 | 61 6d 73 24 2c 70 25 2b |ms$=.par|ams$,p%+|
|00000300| a9 22 20 2d 71 75 69 74 | 20 22 29 0d 00 d2 2a c8 |." -quit| ")...*.|
|00000310| 95 20 97 28 70 61 72 61 | 6d 73 24 29 3d 33 32 20 |. .(para|ms$)=32 |
|00000320| 70 61 72 61 6d 73 24 3d | c1 70 61 72 61 6d 73 24 |params$=|.params$|
|00000330| 2c 32 29 3a ce 0d 00 dc | 18 e7 20 97 28 70 61 72 |,2):....|.. .(par|
|00000340| 61 6d 73 24 29 3d 97 22 | 22 22 22 20 8c 0d 00 e6 |ams$)=."|""" ....|
|00000350| 28 70 61 72 61 6d 73 24 | 3d c1 70 61 72 61 6d 73 |(params$|=.params|
|00000360| 24 2c a7 70 61 72 61 6d | 73 24 2c 22 22 22 22 2c |$,.param|s$,"""",|
|00000370| 32 29 2b 31 29 0d 00 f0 | 05 cc 0d 00 fa 25 70 61 |2)+1)...|.....%pa|
|00000380| 72 61 6d 73 24 3d c1 70 | 61 72 61 6d 73 24 2c a7 |rams$=.p|arams$,.|
|00000390| 70 61 72 61 6d 73 24 2c | 22 20 22 29 2b 31 29 0d |params$,|" ")+1).|
|000003a0| 01 04 05 cd 0d 01 0e 20 | c8 95 20 70 61 72 61 6d |....... |.. param|
|000003b0| 73 24 3c 3e 22 22 20 80 | 20 6e 69 63 6f 6e 73 25 |s$<>"" .| nicons%|
|000003c0| 3c 3e 31 30 0d 01 18 2a | c8 95 20 97 28 70 61 72 |<>10...*|.. .(par|
|000003d0| 61 6d 73 24 29 3d 33 32 | 20 70 61 72 61 6d 73 24 |ams$)=32| params$|
|000003e0| 3d c1 70 61 72 61 6d 73 | 24 2c 32 29 3a ce 0d 01 |=.params|$,2):...|
|000003f0| 22 13 e7 20 70 61 72 61 | 6d 73 24 3c 3e 22 22 20 |".. para|ms$<>"" |
|00000400| 8c 0d 01 2c 18 e7 20 97 | 28 70 61 72 61 6d 73 24 |...,.. .|(params$|
|00000410| 29 3d 97 22 22 22 22 20 | 8c 0d 01 36 17 70 25 3d |)=."""" |...6.p%=|
|00000420| a7 70 61 72 61 6d 73 24 | 2c 22 22 22 22 2c 32 29 |.params$|,"""",2)|
|00000430| 0d 01 40 19 63 6f 6d 24 | 3d c1 70 61 72 61 6d 73 |..@.com$|=.params|
|00000440| 24 2c 32 2c 70 25 2d 32 | 29 0d 01 4a 1a 70 61 72 |$,2,p%-2|)..J.par|
|00000450| 61 6d 73 24 3d c1 70 61 | 72 61 6d 73 24 2c 70 25 |ams$=.pa|rams$,p%|
|00000460| 2b 31 29 0d 01 54 05 cc | 0d 01 5e 18 70 25 3d a7 |+1)..T..|..^.p%=.|
|00000470| 70 61 72 61 6d 73 24 2b | 22 20 22 2c 22 20 22 29 |params$+|" "," ")|
|00000480| 0d 01 68 17 63 6f 6d 24 | 3d c0 70 61 72 61 6d 73 |..h.com$|=.params|
|00000490| 24 2c 70 25 2d 31 29 0d | 01 72 1a 70 61 72 61 6d |$,p%-1).|.r.param|
|000004a0| 73 24 3d c1 70 61 72 61 | 6d 73 24 2c 70 25 2b 31 |s$=.para|ms$,p%+1|
|000004b0| 29 0d 01 7c 05 cd 0d 01 | 86 15 f2 6e 65 77 69 63 |)..|....|...newic|
|000004c0| 6f 6e 28 71 25 2c 63 6f | 6d 24 29 0d 01 90 05 cd |on(q%,co|m$).....|
|000004d0| 0d 01 9a 05 ce 0d 01 a4 | 05 cc 0d 01 ae 49 f2 6e |........|.....I.n|
|000004e0| 65 77 69 63 6f 6e 28 71 | 25 2c 43 6f 6d 6d 61 6e |ewicon(q|%,Comman|
|000004f0| 64 24 29 3a f4 20 54 68 | 69 73 20 69 73 20 77 68 |d$):. Th|is is wh|
|00000500| 61 74 20 79 6f 75 20 67 | 65 74 20 69 66 20 79 6f |at you g|et if yo|
|00000510| 75 20 42 41 53 49 43 20 | 3c 74 68 69 73 20 66 69 |u BASIC |<this fi|
|00000520| 6c 65 3e 0d 01 b8 05 cd | 0d 01 c2 04 0d 01 cc 36 |le>.....|.......6|
|00000530| e7 20 6e 69 63 6f 6e 73 | 25 3d 30 20 f2 6e 65 77 |. nicons|%=0 .new|
|00000540| 69 63 6f 6e 28 71 25 2c | 43 6f 6d 6d 61 6e 64 24 |icon(q%,|Command$|
|00000550| 29 3a f4 20 53 74 61 72 | 74 2d 75 70 20 74 69 74 |):. Star|t-up tit|
|00000560| 6c 65 0d 01 d6 04 0d 01 | e0 05 f5 0d 01 ea 3f c8 |le......|......?.|
|00000570| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c ac 28 |. "Wimp_|Poll",.(|
|00000580| 28 33 3c 3c 31 37 29 84 | 28 31 3c 3c 39 29 84 28 |(3<<17).|(1<<9).(|
|00000590| 31 3c 3c 38 29 84 28 31 | 3c 3c 36 29 29 2c 71 25 |1<<8).(1|<<6)),q%|
|000005a0| 20 b8 20 72 65 61 73 6f | 6e 25 0d 01 f4 10 c8 8e | . reaso|n%......|
|000005b0| 20 72 65 61 73 6f 6e 25 | 20 ca 0d 01 fe 18 c9 20 | reason%| ...... |
|000005c0| 36 3a f2 6d 6f 75 73 65 | 62 75 74 74 6f 6e 28 71 |6:.mouse|button(q|
|000005d0| 25 29 0d 02 08 17 c9 20 | 39 3a f2 6d 65 6e 75 73 |%)..... |9:.menus|
|000005e0| 65 6c 65 63 74 28 71 25 | 29 0d 02 12 18 c9 20 31 |elect(q%|)..... 1|
|000005f0| 37 2c 31 38 3a f2 6d 65 | 73 73 61 67 65 28 71 25 |7,18:.me|ssage(q%|
|00000600| 29 0d 02 1c 05 cb 0d 02 | 26 06 fd 30 0d 02 30 04 |).......|&..0..0.|
|00000610| 0d 02 3a 11 dd f2 6d 65 | 73 73 61 67 65 28 71 25 |..:...me|ssage(q%|
|00000620| 29 0d 02 44 0e c8 8e 20 | 71 25 21 31 36 20 ca 0d |)..D... |q%!16 ..|
|00000630| 02 4e 0c c9 20 30 3a f2 | 65 6e 64 0d 02 58 0d c9 |.N.. 0:.|end..X..|
|00000640| 20 33 3a f2 74 61 73 6b | 0d 02 62 05 cb 0d 02 6c | 3:.task|..b....l|
|00000650| 05 e1 0d 02 76 04 0d 02 | 80 0a dd f2 74 61 73 6b |....v...|....task|
|00000660| 0d 02 8a 0d ea 20 70 25 | 2c 67 6f 74 25 0d 02 94 |..... p%|,got%...|
|00000670| 10 e7 20 71 25 21 32 30 | 3d 2d 32 20 8c 0d 02 9e |.. q%!20|=-2 ....|
|00000680| 0b 67 6f 74 25 3d 2d 31 | 0d 02 a8 16 c8 95 20 70 |.got%=-1|...... p|
|00000690| 25 3c 31 30 20 80 20 67 | 6f 74 25 3d 2d 31 0d 02 |%<10 . g|ot%=-1..|
|000006a0| b2 1e e7 20 69 63 6f 6e | 73 25 28 70 25 29 3d 71 |... icon|s%(p%)=q|
|000006b0| 25 21 32 34 20 67 6f 74 | 25 3d 70 25 0d 02 bc 09 |%!24 got|%=p%....|
|000006c0| 70 25 2b 3d 31 0d 02 c6 | 05 ce 0d 02 d0 10 e7 20 |p%+=1...|....... |
|000006d0| 67 6f 74 25 3c 3e 2d 31 | 20 8c 0d 02 da 22 f2 72 |got%<>-1| ....".r|
|000006e0| 75 6e 6d 6f 72 69 61 28 | a4 67 65 74 73 74 72 28 |unmoria(|.getstr(|
|000006f0| 71 25 2b 34 34 29 2c 67 | 6f 74 25 29 0d 02 e4 05 |q%+44),g|ot%)....|
|00000700| cd 0d 02 ee 05 cd 0d 02 | f8 05 e1 0d 03 02 1b dd |........|........|
|00000710| f2 72 75 6e 6d 6f 72 69 | 61 28 50 61 72 61 6d 24 |.runmori|a(Param$|
|00000720| 2c 67 6f 74 25 29 0d 03 | 0c 07 ea 20 53 0d 03 16 |,got%)..|... S...|
|00000730| 13 de 20 53 20 a9 28 50 | 61 72 61 6d 24 29 2b 31 |.. S .(P|aram$)+1|
|00000740| 0d 03 20 10 4c 61 73 74 | 24 3d 50 61 72 61 6d 24 |.. .Last|$=Param$|
|00000750| 0d 03 2a 0d 24 53 3d 50 | 61 72 61 6d 24 0d 03 34 |..*.$S=P|aram$..4|
|00000760| 0b 49 3d a9 28 24 53 29 | 0d 03 3e 20 49 3d 49 2d |.I=.($S)|..> I=I-|
|00000770| 31 3a e7 20 53 3f 49 20 | 3c 3e 20 97 28 22 2e 22 |1:. S?I |<> .("."|
|00000780| 29 20 e5 20 8d 54 7e 43 | 0d 03 48 0a 53 3f 49 3d |) . .T~C|..H.S?I=|
|00000790| 31 33 0d 03 52 21 20 20 | ff 28 22 2a 53 65 74 20 |13..R! |.("*Set |
|000007a0| 54 65 58 53 6f 75 72 63 | 65 20 22 2b 24 53 2b 22 |TeXSourc|e "+$S+"|
|000007b0| 2e 22 29 0d 03 54 13 20 | 20 ff 28 22 2a 64 69 72 |.")..T. | .("*dir|
|000007c0| 20 22 2b 24 53 29 0d 03 | 5c 2c 20 20 50 61 72 61 | "+$S)..|\, Para|
|000007d0| 6d 24 3d 22 3c 54 65 58 | 53 6f 75 72 63 65 3e 22 |m$="<TeX|Source>"|
|000007e0| 2b a4 66 69 6c 65 6e 61 | 6d 65 28 50 61 72 61 6d |+.filena|me(Param|
|000007f0| 24 29 0d 03 66 55 20 20 | c8 99 20 22 4f 53 5f 53 |$)..fU |.. "OS_S|
|00000800| 75 62 73 74 69 74 75 74 | 65 41 72 67 73 22 2c 50 |ubstitut|eArgs",P|
|00000810| 61 72 61 6d 24 2c 62 75 | 66 66 65 72 73 25 2c 32 |aram$,bu|ffers%,2|
|00000820| 35 35 2c 24 28 63 6f 6d | 6d 62 75 66 66 65 72 25 |55,$(com|mbuffer%|
|00000830| 29 2b 22 20 22 2c a9 24 | 28 63 6f 6d 6d 62 75 66 |)+" ",.$|(commbuf|
|00000840| 66 65 72 25 29 2b 31 0d | 03 70 29 20 20 c8 99 20 |fer%)+1.|.p) .. |
|00000850| 22 57 69 6d 70 5f 53 6c | 6f 74 53 69 7a 65 22 2c |"Wimp_Sl|otSize",|
|00000860| 2d 31 2c 2d 31 20 b8 20 | 72 30 2c 72 31 2c 72 32 |-1,-1 . |r0,r1,r2|
|00000870| 0d 03 7a 25 20 20 c8 99 | 20 22 57 69 6d 70 5f 53 |..z% ..| "Wimp_S|
|00000880| 6c 6f 74 53 69 7a 65 22 | 2c 2d 31 2c 31 35 33 36 |lotSize"|,-1,1536|
|00000890| 2a 31 30 32 34 0d 03 84 | 23 20 20 c8 99 20 22 58 |*1024...|# .. "X|
|000008a0| 57 69 6d 70 5f 53 74 61 | 72 74 54 61 73 6b 22 2c |Wimp_Sta|rtTask",|
|000008b0| 62 75 66 66 65 72 73 25 | 0d 03 8e 42 20 20 c8 99 |buffers%|...B ..|
|000008c0| 20 22 58 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 | "XWimp_|SlotSize|
|000008d0| 22 2c 2d 31 2c 72 31 3a | 20 f4 20 50 75 74 20 62 |",-1,r1:| . Put b|
|000008e0| 61 63 6b 20 68 6f 77 20 | 69 74 20 77 61 73 20 69 |ack how |it was i|
|000008f0| 66 20 70 6f 73 73 69 62 | 6c 65 0d 03 9d 0f 20 20 |f possib|le.... |
|00000900| ff 28 22 62 61 63 6b 22 | 29 0d 03 a2 05 e1 0d 03 |.("back"|).......|
|00000910| ac 05 20 0d 03 b6 04 0d | 03 c0 14 dd f2 6e 65 77 |.. .....|.....new|
|00000920| 69 63 6f 6e 28 71 25 2c | 61 24 29 0d 03 ca 08 ea |icon(q%,|a$).....|
|00000930| 20 6e 25 0d 03 d4 3c e7 | 20 61 24 3d 22 22 20 61 | n%...<.| a$="" a|
|00000940| 24 3d 22 43 6c 6f 6e 65 | 64 22 3a f4 20 54 68 69 |$="Clone|d":. Thi|
|00000950| 73 20 6f 6e 65 20 6e 65 | 76 65 72 20 63 61 6c 6c |s one ne|ver call|
|00000960| 65 64 20 49 20 73 75 73 | 70 65 63 74 2e 2e 2e 0d |ed I sus|pect....|
|00000970| 03 de 1d c8 95 20 69 63 | 6f 6e 73 25 28 6e 25 29 |..... ic|ons%(n%)|
|00000980| 3c 3e 2d 31 20 6e 25 2b | 3d 31 3a ce 0d 03 e8 4f |<>-1 n%+|=1:....O|
|00000990| 24 28 74 65 78 74 62 75 | 66 66 65 72 25 29 3d a4 |$(textbu|ffer%)=.|
|000009a0| 6d 61 73 73 61 67 65 28 | 61 24 29 3a f4 20 54 68 |massage(|a$):. Th|
|000009b0| 69 73 20 69 73 20 77 68 | 61 74 20 69 73 20 69 6e |is is wh|at is in|
|000009c0| 20 74 68 65 20 69 6e 69 | 74 69 61 6c 20 74 79 70 | the ini|tial typ|
|000009d0| 65 2d 69 6e 20 77 69 6e | 64 6f 77 0d 03 f2 3b 24 |e-in win|dow...;$|
|000009e0| 28 63 6f 6d 6d 62 75 66 | 66 65 72 25 29 3d 61 24 |(commbuf|fer%)=a$|
|000009f0| 3a f4 20 77 61 73 20 6d | 61 73 73 61 67 65 64 20 |:. was m|assaged |
|00000a00| 68 65 72 65 2e 2e 2e 20 | 6e 6f 77 20 64 6f 6e 65 |here... |now done|
|00000a10| 20 62 65 6c 6f 77 0d 03 | fc 0b 71 25 21 30 3d 2d | below..|..q%!0=-|
|00000a20| 31 0d 04 06 0a 71 25 21 | 34 3d 30 0d 04 10 0c 71 |1....q%!|4=0....q|
|00000a30| 25 21 38 3d 2d 31 36 0d | 04 1a 0d 71 25 21 31 32 |%!8=-16.|...q%!12|
|00000a40| 3d 31 32 38 0d 04 24 0c | 71 25 21 31 36 3d 38 38 |=128..$.|q%!16=88|
|00000a50| 0d 04 2e 46 71 25 21 32 | 30 3d 28 31 20 3c 3c 20 |...Fq%!2|0=(1 << |
|00000a60| 32 38 29 84 28 37 20 3c | 3c 20 32 34 29 84 28 33 |28).(7 <|< 24).(3|
|00000a70| 20 3c 3c 20 31 32 29 84 | 28 31 20 3c 3c 20 38 29 | << 12).|(1 << 8)|
|00000a80| 84 28 31 20 3c 3c 20 35 | 29 84 28 31 20 3c 3c 20 |.(1 << 5|).(1 << |
|00000a90| 33 29 84 28 33 29 0d 04 | 38 6b 71 25 21 32 34 3d |3).(3)..|8kq%!24=|
|00000aa0| 74 65 78 74 62 75 66 66 | 65 72 25 3a f4 20 49 66 |textbuff|er%:. If|
|00000ab0| 20 75 73 65 20 74 65 78 | 74 62 75 66 66 65 72 20 | use tex|tbuffer |
|00000ac0| 68 65 72 65 2c 20 64 6f | 6e 27 74 20 67 65 74 20 |here, do|n't get |
|00000ad0| 31 73 74 20 63 6f 72 72 | 65 63 74 20 6f 63 63 75 |1st corr|ect occu|
|00000ae0| 72 61 6e 63 65 20 6f 66 | 20 6e 61 6d 65 20 61 66 |rance of| name af|
|00000af0| 74 65 72 20 74 79 70 69 | 6e 67 20 69 74 20 69 6e |ter typi|ng it in|
|00000b00| 2e 0d 04 42 2b f4 42 55 | 47 20 73 77 61 70 70 65 |...B+.BU|G swappe|
|00000b10| 64 20 62 75 66 66 73 20 | 69 6e 20 39 35 30 2c 20 |d buffs |in 950, |
|00000b20| 6d 61 73 73 61 67 65 64 | 20 38 37 30 0d 04 4c 16 |massaged| 870..L.|
|00000b30| 71 25 21 32 38 3d 76 61 | 6c 69 64 62 75 66 66 65 |q%!28=va|lidbuffe|
|00000b40| 72 25 0d 04 56 0c 71 25 | 21 33 32 3d 36 34 0d 04 |r%..V.q%|!32=64..|
|00000b50| 60 29 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |`).. "Wi|mp_Creat|
|00000b60| 65 49 63 6f 6e 22 2c 2c | 71 25 20 b8 20 69 63 6f |eIcon",,|q% . ico|
|00000b70| 6e 73 25 28 6e 25 29 0d | 04 6a 4d f4 24 28 63 6f |ns%(n%).|.jM.$(co|
|00000b80| 6d 6d 62 75 66 66 65 72 | 25 29 3d 46 4e 6d 61 73 |mmbuffer|%)=FNmas|
|00000b90| 73 61 67 65 28 61 24 29 | 3a 52 45 4d 20 54 68 69 |sage(a$)|:REM Thi|
|00000ba0| 73 20 69 73 20 77 68 61 | 74 20 69 73 20 6f 6e 20 |s is wha|t is on |
|00000bb0| 74 68 65 20 69 6e 69 74 | 69 61 6c 20 43 4c 49 20 |the init|ial CLI |
|00000bc0| 49 63 6f 6e 0d 04 74 3c | 71 25 21 32 34 3d 63 6f |Icon..t<|q%!24=co|
|00000bd0| 6d 6d 62 75 66 66 65 72 | 25 3a f4 20 54 45 53 54 |mmbuffer|%:. TEST|
|00000be0| 49 4e 47 20 42 55 47 3a | 20 63 68 61 6e 67 65 64 |ING BUG:| changed|
|00000bf0| 20 66 72 6f 6d 20 63 6f | 6d 6d 2d 3e 74 65 78 74 | from co|mm->text|
|00000c00| 0d 04 7e 0e 6e 69 63 6f | 6e 73 25 2b 3d 31 0d 04 |..~.nico|ns%+=1..|
|00000c10| 88 05 e1 0d 04 92 04 0d | 04 9c 10 dd a4 67 65 74 |........|.....get|
|00000c20| 73 74 72 28 61 25 29 0d | 04 a6 08 ea 20 61 24 0d |str(a%).|.... a$.|
|00000c30| 04 b0 1b c8 95 20 3f 61 | 25 20 61 24 2b 3d bd 3f |..... ?a|% a$+=.?|
|00000c40| 61 25 3a 61 25 2b 3d 31 | 3a ce 0d 04 ba 07 3d 61 |a%:a%+=1|:.....=a|
|00000c50| 24 0d 04 c4 04 0d 04 ce | 0f dd 20 f2 65 72 72 6f |$.......|.. .erro|
|00000c60| 72 62 6f 78 0d 04 d8 19 | c8 99 20 22 57 69 6d 70 |rbox....|.. "Wimp|
|00000c70| 5f 44 72 61 67 42 6f 78 | 22 2c 2c 2d 31 0d 04 e2 |_DragBox|",,-1...|
|00000c80| 32 21 62 75 66 66 65 72 | 73 25 3d 9f 3a 24 28 62 |2!buffer|s%=.:$(b|
|00000c90| 75 66 66 65 72 73 25 2b | 34 29 3d f6 24 2b 22 20 |uffers%+|4)=.$+" |
|00000ca0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 2b bd 30 0d |at line |"+..+.0.|
|00000cb0| 04 ec 2a c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |..*.. "W|imp_Repo|
|00000cc0| 72 74 45 72 72 6f 72 22 | 2c 62 75 66 66 65 72 73 |rtError"|,buffers|
|00000cd0| 25 2c 31 2c 54 61 73 6b | 24 0d 04 f6 08 f2 65 6e |%,1,Task|$.....en|
|00000ce0| 64 0d 05 00 05 e1 0d 05 | 0a 04 0d 05 14 0e dd f2 |d.......|........|
|00000cf0| 6d 61 6b 65 6d 65 6e 75 | 0d 05 1e 36 24 6d 65 6e |makemenu|...6$men|
|00000d00| 75 25 3d 4d 65 6e 75 24 | 3a f4 20 54 69 74 6c 65 |u%=Menu$|:. Title|
|00000d10| 20 61 74 20 74 6f 70 20 | 6f 66 20 6d 65 6e 75 20 | at top |of menu |
|00000d20| 77 68 65 6e 20 63 61 6c | 6c 65 64 20 75 70 0d 05 |when cal|led up..|
|00000d30| 28 0e 6d 65 6e 75 25 3f | 31 32 3d 37 0d 05 32 0e |(.menu%?|12=7..2.|
|00000d40| 6d 65 6e 75 25 3f 31 33 | 3d 32 0d 05 3c 0e 6d 65 |menu%?13|=2..<.me|
|00000d50| 6e 75 25 3f 31 34 3d 37 | 0d 05 46 0e 6d 65 6e 75 |nu%?14=7|..F.menu|
|00000d60| 25 3f 31 35 3d 30 0d 05 | 50 10 6d 65 6e 75 25 21 |%?15=0..|P.menu%!|
|00000d70| 31 36 3d 31 38 38 0d 05 | 5a 0f 6d 65 6e 75 25 21 |16=188..|Z.menu%!|
|00000d80| 32 30 3d 34 30 0d 05 64 | 0e 6d 65 6e 75 25 21 32 |20=40..d|.menu%!2|
|00000d90| 34 3d 30 0d 05 6e 0f 6d | 25 3d 6d 65 6e 75 25 2b |4=0..n.m|%=menu%+|
|00000da0| 32 38 0d 05 78 0a 6d 25 | 21 30 3d 30 0d 05 82 0b |28..x.m%|!0=0....|
|00000db0| 6d 25 21 34 3d 2d 31 0d | 05 8c 28 6d 25 21 38 3d |m%!4=-1.|..(m%!8=|
|00000dc0| 28 37 3c 3c 32 34 29 84 | 28 2d 28 6e 69 63 6f 6e |(7<<24).|(-(nicon|
|00000dd0| 73 25 3d 31 30 29 3c 3c | 32 32 29 84 28 31 29 0d |s%=10)<<|22).(1).|
|00000de0| 05 96 16 24 28 6d 25 2b | 31 32 29 3d 45 78 65 63 |...$(m%+|12)=Exec|
|00000df0| 43 6f 6d 6d 24 0d 05 a0 | 0a 6d 25 2b 3d 32 34 0d |Comm$...|.m%+=24.|
|00000e00| 05 aa 0a 6d 25 21 30 3d | 30 0d 05 b4 0e 6d 25 21 |...m%!0=|0....m%!|
|00000e10| 34 3d 6d 25 2b 34 38 0d | 05 be 14 6d 25 21 38 3d |4=m%+48.|...m%!8=|
|00000e20| 28 37 3c 3c 32 34 29 84 | 28 31 29 0d 05 c8 15 24 |(7<<24).|(1)....$|
|00000e30| 28 6d 25 2b 31 32 29 3d | 4f 70 74 43 6f 6d 6d 24 |(m%+12)=|OptComm$|
|00000e40| 0d 05 d2 0a 6d 25 2b 3d | 32 34 0d 05 dc 0c 6d 25 |....m%+=|24....m%|
|00000e50| 21 30 3d 26 38 30 0d 05 | e6 0b 6d 25 21 34 3d 2d |!0=&80..|..m%!4=-|
|00000e60| 31 0d 05 f0 14 6d 25 21 | 38 3d 28 37 3c 3c 32 34 |1....m%!|8=(7<<24|
|00000e70| 29 84 28 31 29 0d 05 fa | 1a 24 28 6d 25 2b 31 32 |).(1)...|.$(m%+12|
|00000e80| 29 3d 22 51 75 69 74 20 | 20 20 20 20 20 20 22 0d |)="Quit | ".|
|00000e90| 06 04 0a 6d 25 2b 3d 32 | 34 0d 06 0e 11 24 6d 25 |...m%+=2|4....$m%|
|00000ea0| 3d 22 43 6f 6d 6d 61 6e | 64 22 0d 06 18 0b 6d 25 |="Comman|d"....m%|
|00000eb0| 3f 31 32 3d 37 0d 06 22 | 0b 6d 25 3f 31 33 3d 32 |?12=7.."|.m%?13=2|
|00000ec0| 0d 06 2c 0b 6d 25 3f 31 | 34 3d 37 0d 06 36 0b 6d |..,.m%?1|4=7..6.m|
|00000ed0| 25 3f 31 35 3d 30 0d 06 | 40 0d 6d 25 21 31 36 3d |%?15=0..|@.m%!16=|
|00000ee0| 31 36 30 0d 06 4a 0c 6d | 25 21 32 30 3d 34 30 0d |160..J.m|%!20=40.|
|00000ef0| 06 54 0b 6d 25 21 32 34 | 3d 30 0d 06 5e 0a 6d 25 |.T.m%!24|=0..^.m%|
|00000f00| 2b 3d 32 38 0d 06 68 0c | 6d 25 21 30 3d 26 38 34 |+=28..h.|m%!0=&84|
|00000f10| 0d 06 72 0b 6d 25 21 34 | 3d 2d 31 0d 06 7c 1b 6d |..r.m%!4|=-1..|.m|
|00000f20| 25 21 38 3d 28 37 3c 3c | 32 34 29 84 28 31 3c 3c |%!8=(7<<|24).(1<<|
|00000f30| 38 29 84 28 31 29 0d 06 | 86 12 6d 25 21 31 32 3d |8).(1)..|..m%!12=|
|00000f40| 62 75 66 66 65 72 73 25 | 0d 06 90 0c 6d 25 21 31 |buffers%|....m%!1|
|00000f50| 36 3d 2d 31 0d 06 9a 0c | 6d 25 21 32 30 3d 36 34 |6=-1....|m%!20=64|
|00000f60| 0d 06 a4 40 24 62 75 66 | 66 65 72 73 25 3d 24 28 |...@$buf|fers%=$(|
|00000f70| 63 6f 6d 6d 62 75 66 66 | 65 72 25 29 3a f4 20 42 |commbuff|er%):. B|
|00000f80| 55 47 20 75 73 65 20 77 | 68 69 63 68 3f 20 3c 74 |UG use w|hich? <t|
|00000f90| 65 73 74 65 64 20 6f 74 | 68 65 72 20 6f 6e 65 3e |ested ot|her one>|
|00000fa0| 0d 06 ae 05 e1 0d 06 b8 | 04 0d 06 c2 15 dd f2 6d |........|.......m|
|00000fb0| 6f 75 73 65 62 75 74 74 | 6f 6e 28 71 25 29 0d 06 |ousebutt|on(q%)..|
|00000fc0| cc 0d ea 20 70 25 2c 67 | 6f 74 25 0d 06 d6 0b 67 |... p%,g|ot%....g|
|00000fd0| 6f 74 25 3d 2d 31 0d 06 | e0 10 e7 20 71 25 21 31 |ot%=-1..|... q%!1|
|00000fe0| 32 3d 2d 32 20 8c 0d 06 | ea 16 c8 95 20 70 25 3c |2=-2 ...|.... p%<|
|00000ff0| 31 30 20 80 20 67 6f 74 | 25 3d 2d 31 0d 06 f4 1e |10 . got|%=-1....|
|00001000| e7 20 69 63 6f 6e 73 25 | 28 70 25 29 3d 71 25 21 |. icons%|(p%)=q%!|
|00001010| 31 36 20 67 6f 74 25 3d | 70 25 0d 06 fe 09 70 25 |16 got%=|p%....p%|
|00001020| 2b 3d 31 0d 07 08 05 ce | 0d 07 12 10 e7 20 67 6f |+=1.....|..... go|
|00001030| 74 25 3c 3e 2d 31 20 8c | 0d 07 1c 0d c8 8e 20 71 |t%<>-1 .|...... q|
|00001040| 25 21 38 20 ca 0d 07 26 | 16 c9 20 32 3a 6d 65 6e |%!8 ...&|.. 2:men|
|00001050| 75 69 63 6f 6e 25 3d 67 | 6f 74 25 0d 07 30 0d f2 |uicon%=g|ot%..0..|
|00001060| 6d 61 6b 65 6d 65 6e 75 | 0d 07 3a 2d c8 99 20 22 |makemenu|..:-.. "|
|00001070| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00001080| 2c 2c 6d 65 6e 75 25 2c | 28 71 25 21 30 29 2d 36 |,,menu%,|(q%!0)-6|
|00001090| 34 2c 32 31 36 0d 07 44 | 20 c9 20 31 2c 34 3a 20 |4,216..D| . 1,4: |
|000010a0| f2 72 75 6e 6d 6f 72 69 | 61 28 4c 61 73 74 24 2c |.runmori|a(Last$,|
|000010b0| 67 6f 74 25 29 0d 07 4e | 05 cb 0d 07 58 05 cd 0d |got%)..N|....X...|
|000010c0| 07 62 05 cd 0d 07 6c 05 | e1 0d 07 76 05 20 0d 07 |.b....l.|...v. ..|
|000010d0| 80 1f dd a4 6d 61 73 73 | 61 67 65 28 4e 61 6d 65 |....mass|age(Name|
|000010e0| 24 29 3a 3d 49 63 6f 6e | 4e 61 6d 65 24 0d 07 8a |$):=Icon|Name$...|
|000010f0| 2f ea 20 53 20 20 20 20 | 20 20 20 20 20 3a f4 20 |/. S | :. |
|00001100| 57 68 65 72 65 20 64 6f | 65 73 20 6e 61 6d 65 20 |Where do|es name |
|00001110| 67 65 74 20 63 68 61 6e | 67 65 64 3f 0d 07 94 12 |get chan|ged?....|
|00001120| de 20 53 20 a9 28 4e 61 | 6d 65 24 29 2b 31 0d 07 |. S .(Na|me$)+1..|
|00001130| 9e 0c 24 53 3d 4e 61 6d | 65 24 0d 07 a8 0b ea 20 |..$S=Nam|e$..... |
|00001140| 49 3a 49 3d 53 0d 07 b2 | 2c c8 95 20 28 28 3f 49 |I:I=S...|,.. ((?I|
|00001150| 20 3c 3e 20 33 32 29 20 | 80 20 28 3f 49 20 3c 3e | <> 32) |. (?I <>|
|00001160| 20 31 33 29 29 3a 20 20 | 49 3d 49 2b 31 3a 20 20 | 13)): |I=I+1: |
|00001170| ce 0d 07 bc 0d 3f 49 3d | 31 33 3a 3d 24 53 0d 07 |.....?I=|13:=$S..|
|00001180| c6 04 0d 07 d0 14 dd f2 | 6d 65 6e 75 73 65 6c 65 |........|menusele|
|00001190| 63 74 28 71 25 29 0d 07 | da 0d c8 8e 20 71 25 21 |ct(q%)..|.... q%!|
|000011a0| 30 20 ca 0d 07 e4 44 c9 | 20 30 3a f2 72 75 6e 6d |0 ....D.| 0:.runm|
|000011b0| 6f 72 69 61 28 4c 61 73 | 74 24 2c 31 29 3a 20 f4 |oria(Las|t$,1): .|
|000011c0| 20 41 73 73 75 6d 65 20 | 31 73 74 20 63 6f 70 79 | Assume |1st copy|
|000011d0| 20 6f 66 20 69 63 6f 6e | 3f 3f 3f 20 42 55 47 20 | of icon|??? BUG |
|000011e0| 31 20 6f 72 20 30 3f 0d | 07 ee 51 c9 20 31 3a 24 |1 or 0?.|..Q. 1:$|
|000011f0| 28 74 65 78 74 62 75 66 | 66 65 72 25 29 3d 24 28 |(textbuf|fer%)=$(|
|00001200| 62 75 66 66 65 72 73 25 | 29 3a f4 20 54 68 69 73 |buffers%|):. This|
|00001210| 20 69 73 20 77 68 61 74 | 20 69 73 20 70 75 74 20 | is what| is put |
|00001220| 75 70 20 69 6e 20 74 68 | 65 20 74 79 70 65 2d 69 |up in th|e type-i|
|00001230| 6e 20 77 69 6e 64 6f 77 | 0d 07 f8 99 24 28 74 65 |n window|....$(te|
|00001240| 78 74 62 75 66 66 65 72 | 25 29 3d a4 6d 61 73 73 |xtbuffer|%)=.mass|
|00001250| 61 67 65 28 24 28 62 75 | 66 66 65 72 73 25 29 29 |age($(bu|ffers%))|
|00001260| 3a f4 20 54 68 69 73 20 | 69 73 20 77 68 61 74 20 |:. This |is what |
|00001270| 69 73 20 70 75 74 20 75 | 70 20 61 66 74 65 72 20 |is put u|p after |
|00001280| 63 68 61 6e 67 69 6e 67 | 20 74 68 65 20 63 6f 6d |changing| the com|
|00001290| 6d 61 6e 64 2c 20 62 75 | 74 20 61 66 74 65 72 20 |mand, bu|t after |
|000012a0| 65 78 65 63 75 74 69 6f | 6e 20 74 68 65 20 64 69 |executio|n the di|
|000012b0| 73 70 6c 61 79 20 73 68 | 6f 77 73 20 74 68 65 20 |splay sh|ows the |
|000012c0| 61 63 74 75 61 6c 20 63 | 6f 6d 6d 61 6e 64 20 3a |actual c|ommand :|
|000012d0| 28 0d 08 02 39 f4 20 42 | 55 47 20 54 48 45 20 41 |(...9. B|UG THE A|
|000012e0| 42 4f 56 45 20 4c 4f 4f | 4b 53 20 44 41 46 54 21 |BOVE LOO|KS DAFT!|
|000012f0| 21 21 20 20 20 28 77 68 | 65 6e 20 69 74 20 77 61 |!! (wh|en it wa|
|00001300| 73 20 63 6f 6d 6d 2e 2e | 2e 29 0d 08 0c 4c 71 25 |s comm..|.)...Lq%|
|00001310| 21 30 3d 2d 32 3a 71 25 | 21 34 3d 69 63 6f 6e 73 |!0=-2:q%|!4=icons|
|00001320| 25 28 6d 65 6e 75 69 63 | 6f 6e 25 29 3a 71 25 21 |%(menuic|on%):q%!|
|00001330| 38 3d 30 3a 71 25 21 31 | 32 3d 30 3a c8 99 20 22 |8=0:q%!1|2=0:.. "|
|00001340| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00001350| 65 22 2c 2c 71 25 0d 08 | 16 50 24 28 63 6f 6d 6d |e",,q%..|.P$(comm|
|00001360| 62 75 66 66 65 72 25 29 | 3d 24 28 62 75 66 66 65 |buffer%)|=$(buffe|
|00001370| 72 73 25 29 3a f4 20 54 | 68 69 73 20 69 73 20 74 |rs%):. T|his is t|
|00001380| 68 65 20 73 74 72 69 6e | 67 20 74 68 61 74 20 61 |he strin|g that a|
|00001390| 63 74 75 61 6c 6c 79 20 | 67 65 74 73 20 65 78 65 |ctually |gets exe|
|000013a0| 63 75 74 65 64 21 0d 08 | 20 28 24 28 74 65 78 74 |cuted!..| ($(text|
|000013b0| 62 75 66 66 65 72 25 29 | 3d a4 6d 61 73 73 61 67 |buffer%)|=.massag|
|000013c0| 65 28 24 28 62 75 66 66 | 65 72 73 25 29 29 0d 08 |e($(buff|ers%))..|
|000013d0| 2a 4d f4 20 54 48 45 20 | 4c 49 4e 45 20 41 42 4f |*M. THE |LINE ABO|
|000013e0| 56 45 20 53 45 54 53 20 | 43 4f 4d 4d 41 4e 44 20 |VE SETS |COMMAND |
|000013f0| 46 52 4f 4d 20 54 59 50 | 45 2d 49 4e 20 53 54 52 |FROM TYP|E-IN STR|
|00001400| 49 4e 47 20 2d 20 57 48 | 41 54 20 41 42 4f 55 54 |ING - WH|AT ABOUT|
|00001410| 20 4d 41 53 53 41 47 45 | 20 42 55 0d 08 34 0b f2 | MASSAGE| BU..4..|
|00001420| 72 65 6d 65 6e 75 0d 08 | 3e 3f c9 20 32 3a 71 25 |remenu..|>?. 2:q%|
|00001430| 21 30 3d 2d 32 3a 71 25 | 21 34 3d 69 63 6f 6e 73 |!0=-2:q%|!4=icons|
|00001440| 25 28 6d 65 6e 75 69 63 | 6f 6e 25 29 3a c8 99 20 |%(menuic|on%):.. |
|00001450| 22 57 69 6d 70 5f 44 65 | 6c 65 74 65 49 63 6f 6e |"Wimp_De|leteIcon|
|00001460| 22 2c 2c 71 25 0d 08 48 | 18 69 63 6f 6e 73 25 28 |",,q%..H|.icons%(|
|00001470| 6d 65 6e 75 69 63 6f 6e | 25 29 3d 2d 31 0d 08 52 |menuicon|%)=-1..R|
|00001480| 0e 6e 69 63 6f 6e 73 25 | 2d 3d 31 0d 08 5c 14 e7 |.nicons%|-=1..\..|
|00001490| 20 6e 69 63 6f 6e 73 25 | 3d 30 20 f2 65 6e 64 0d | nicons%|=0 .end.|
|000014a0| 08 66 05 cb 0d 08 70 05 | e1 0d 08 7a 04 0d 08 84 |.f....p.|...z....|
|000014b0| 0c dd f2 72 65 6d 65 6e | 75 0d 08 8e 20 c8 99 20 |...remen|u... .. |
|000014c0| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|000014d0| 49 6e 66 6f 22 2c 2c 71 | 25 0d 08 98 3c e7 20 71 |Info",,q|%...<. q|
|000014e0| 25 21 38 3d 31 20 f2 6d | 61 6b 65 6d 65 6e 75 3a |%!8=1 .m|akemenu:|
|000014f0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|00001500| 65 6e 75 22 2c 2c 6d 65 | 6e 75 25 2c 71 25 21 30 |enu",,me|nu%,q%!0|
|00001510| 2c 71 25 21 34 0d 08 a2 | 05 e1 0d 08 ac 04 0d 08 |,q%!4...|........|
|00001520| b6 09 dd f2 65 6e 64 0d | 08 c0 2c c8 99 22 57 69 |....end.|..,.."Wi|
|00001530| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 6f 75 |mp_Close|Down",ou|
|00001540| 72 68 61 6e 64 6c 65 25 | 2c 21 74 61 73 6b 69 64 |rhandle%|,!taskid|
|00001550| 25 3a e0 0d 08 ca 05 e1 | 0d 08 d4 05 20 0d 08 de |%:......|.... ...|
|00001560| 12 dd a4 66 69 6c 65 6e | 61 6d 65 28 46 24 29 0d |...filen|ame(F$).|
|00001570| 08 e8 07 ea 20 46 0d 08 | f2 0f de 20 46 20 a9 28 |.... F..|... F .(|
|00001580| 46 24 29 2b 31 0d 08 fc | 09 24 46 3d 46 24 0d 09 |F$)+1...|.$F=F$..|
|00001590| 06 0b ea 20 53 3a 53 3d | 46 0d 09 10 1b c8 95 20 |... S:S=|F...... |
|000015a0| 28 3f 53 20 3c 3e 20 31 | 33 29 3a 20 53 3d 53 2b |(?S <> 1|3): S=S+|
|000015b0| 31 3a 20 ce 0d 09 1a 1f | c8 95 20 28 3f 53 20 3c |1: .....|.. (?S <|
|000015c0| 3e 20 97 28 22 2e 22 29 | 29 3a 20 53 3d 53 2d 31 |> .(".")|): S=S-1|
|000015d0| 3a 20 ce 0d 09 24 09 53 | 3d 53 2b 31 0d 09 2e 07 |: ...$.S|=S+1....|
|000015e0| 3d 24 53 0d ff | |=$S.. | |
+--------+-------------------------+-------------------------+--------+--------+